home *** CD-ROM | disk | FTP | other *** search
/ Mac Expert 2 / Mac_Expert_2.iso / Applications / Fontographer® 4.0.2 / Disk 2 / PC Font Access / PC Font Access.rsrc / STR#_6020.txt < prev    next >
Encoding:
Text File  |  1993-06-17  |  2.1 KB  |  69 lines
  1. MacVec 128 128 getinterval astore pop
  2.  
  3. /macron/breve/dotaccent/ring/cedilla/hungarumlaut/ogonek/caron
  4.  
  5. /apple/Ograve/Uacute/Ucircumflex/Ugrave/dotlessi/circumflex/tilde
  6.  
  7. /Edieresis/Egrave/Iacute/Icircumflex/Idieresis/Igrave/Oacute/Ocircumflex
  8.  
  9. /perthousand/Acircumflex/Ecircumflex/Aacute
  10.  
  11. /daggerdbl/periodcentered/quotesinglbase/quotedblbase
  12.  
  13. /ydieresis/Ydieresis/fraction/currency/guilsinglleft/guilsinglright/fi/fl
  14.  
  15. /endash/emdash/quotedblleft/quotedblright/quoteleft/quoteright/divide/lozenge
  16.  
  17. /guillemotright/ellipsis/nbspace/Agrave/Atilde/Otilde/OE/oe
  18.  
  19. /questiondown/exclamdown/logicalnot/radical/florin/approxequal/Delta/guillemotleft
  20.  
  21. /product/pi/integral/ordfeminine/ordmasculine/Omega/ae/oslash
  22.  
  23. /infinity/plusminus/lessequal/greaterequal/yen/mu/partialdiff/summation
  24.  
  25. /registered/copyright/trademark/acute/dieresis/notequal/AE/Oslash
  26.  
  27. /dagger/degree/cent/sterling/section/bullet/paragraph/germandbls
  28.  
  29. /ograve/ocircumflex/odieresis/otilde/uacute/ugrave/ucircumflex/udieresis
  30.  
  31. /ecircumflex/edieresis/iacute/igrave/icircumflex/idieresis/ntilde/oacute
  32.  
  33. /agrave/acircumflex/adieresis/atilde/aring/ccedilla/eacute/egrave
  34.  
  35. /Adieresis/Aring/Ccedilla/Eacute/Ntilde/Odieresis/Udieresis/aacute
  36.  
  37. /twosuperior/brokenbar/minus/multiply/RS/US MacVec 0 32 getinterval astore pop
  38.  
  39. /onehalf/onequarter/onesuperior/threequarters/threesuperior
  40.  
  41. /Thorn/thorn/CR/Zcaron/zcaron/DLE/DC1/DC2/DC3/DC4
  42.  
  43. /NUL/Eth/eth/Lslash/lslash/Scaron/scaron/Yacute/yacute/HT/LF
  44.  
  45. MacVec 127 /DEL put MacVec 16#27 /quotesingle put MacVec 16#60 /grave put
  46.  
  47. MacVec 0 /Helvetica findfont /Encoding get 0 128 getinterval putinterval
  48.  
  49. /MacVec 256 array def
  50.  
  51. /RF{dup cvn FontDirectory exch known{pop}{RC}ifelse}bind def
  52.  
  53. {cvn findfont pop}ifelse}bind def
  54.  
  55. /Encoding MacVec put NewN exch definefont pop}
  56.  
  57. findfont dup maxlength dict CD dup/FontName NewN put dup
  58.  
  59. /RC{(|______)anchorsearch{1 index MN cvn/NewN exch def cvn
  60.  
  61. Len 4 -1 roll putinterval dup 0 4 -1 roll putinterval}bind def
  62.  
  63. /MN{1 index length/Len exch def dup length Len add string dup
  64.  
  65. {pop pop}ifelse}forall NF}bind def
  66.  
  67. /CD{/NF exch def{exch dup/FID ne 1 index/UniqueID ne and{exch NF 3 1 roll put}
  68.  
  69.